Declare Function ShellAbout Lib "shell.dll" (ByVal hWnd As Integer, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Integer) As Long
#ElseIf Win32 Then
Declare Function ShellAbout Lib "shell32.dll" Alias "ShellAboutA" (ByVal hWnd As Long, ByVal szApp As String, ByVal szOtherStuff As String, ByVal hIcon As Long) As Long
#End If
Sub AppAbout(AppForm As Form, szTitle As String, szOtherInfo As String)